home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / pc / macf / mita.dir / 00278.ls < prev    next >
Encoding:
Text File  |  1995-10-10  |  627 b   |  30 lines

  1. on mouseUp
  2.   global prev, gSound, MovieSeq, gSpeed
  3.   set gSpeed to 1
  4.   if prev > 0 then
  5.     set prev to 0
  6.     set the visible of sprite 19 to 0
  7.     repeat with x = 13 to 18
  8.       set the visible of sprite x to 1
  9.       puppetSprite(x, 0)
  10.     end repeat
  11.   end if
  12.   set the soundLevel to gSound
  13.   puppetSound("OPEN.AIF")
  14.   updateStage()
  15.   stopQT()
  16.   repeat with x = 3 to 7
  17.     set the visible of sprite x to 1
  18.     puppetSprite(x, 0)
  19.   end repeat
  20.   set MovieSeq to 0
  21.   setbar()
  22.   repeat with x = 46 to 47
  23.     puppetSprite(x, 1)
  24.     set the visible of sprite x to 0
  25.     puppetSprite(x, 0)
  26.   end repeat
  27.   unLoadCast()
  28.   go("no")
  29. end
  30.